﻿Imports QLPhuTungOto.Data
Public Class ChiTietPhieuNhapBUS
    Public Function LayCTPNTheoMaPN(ByVal maPN As Integer) As List(Of ChiTietPhieuNhap)
        Dim db As New QLPhuTungOtoDataContext
        Return db.ChiTietPhieuNhap.LayCTPNTheoMaPN(maPN)
    End Function
End Class
